@L}5 _$% l0$)$$Hȱ$ UhL" `e$$%`$%`  R@W!( L(1   Y I`  d  Ld M * @  $ % CC$$)%1 Udߥ$9%: !0 S$% DD˙`  }J)Lr d M * @  $ % CC$$)%1 Udߥ$9%: !0 S$%} DD˙`  }J)Lr J  ((  p L ()   J}L= ( L 0q A    IB JC;? D W } LL  ` W )LA!  ߰")-݆ p" } $G@LL 08`Q")<2Q0 -G$Ș݆ UL# ; p8(()(0ʥ)NQ` }$GȘ݆LU )L ݆ L GȘ ݆LL )W>Z   HH)H }p h  hyhy D L> L JJ    ! LA*` BF }7'8  M HN H` 8 Z  \LdJJ!"! GFE@F (!L }EE !E^ ^ E E7EȩEdE/EȩE  D } .L }  ;F d  ;?F7F? ( .   Z D LL d } . D  L    p  E` , d)  D L) 0BM݊L݉} ML  N݆ L NLML [ TEqEHȱEqEh 0Gȹ G} HLL GɛL  LFREE SECTORS G) *Gȩ GȽG GȌ*jj >G} C8jJ3j2CD( C202C ԠBX` N 1? l LlD:RAMDISK}.COMLu L1 L ;LHL  T`  `1  ɐ     `TU  } L ? .  t`GBJ ~DEHI B V0dV!}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEh"}DEL8HI4 0 HI,0 0  9 .G VLO#},0 L4*IJ`llD1:AUTORUN.SYSNEED MEM.SAV TO LOAD THIS FILE.D1:MEM.SAV J y08 B|DEHI$} V0 0`B;DEL`?<0LV`@ʆ v s? F0Ξ05: [ BDEHI%} VY8 B V  @  /DE `E:D1:DUP.SYSERROR-SAVING USER MEMORY ON DISKTYPE Y TO &}STILL RUN DOS B;DE J  (` 9 V⪍ ઍ  -'}LLu ÝDEHILV 9 .l 9 .l  `` s$B BH(}I|DE V BLV nB,DE JLV B V BLVDEIʩ BꭝLu } 3E:}DISK OPERATING SYSTEM II VERSION COPYRIGHT 1984 ATARI CORP.A. DISK DIRECTORY I. FORMAT DISKB. RUN CARTRIDG*}E J. DUPLICATE DISKC. COPY FILE K. BINARY SAVED. DELETE FILE(S) L. BINARY LOADE. RENAME FILE M. RUN AT ADDRES+}SF. LOCK FILE N. CREATE MEM.SAVG. UNLOCK FILE O. DUPLICATE FILEH. WRITE DOS FILES P. FORMAT SINGLEL !N',}#"&))9(&*)/h)''-&؆莟R'S  vL/ˢ L }Insert DOS 2.0s, type Y Λx -}DEfHI 1莏#q! @ y0ɛ8A0,' ȅ 1 1ild! 1L!NO SUCH ITEMSELECT.} ITEM OR FOR MENU! 0 .z:*{}.|{ 1 0 0JB 18L%|DL/}%DIRECTORY--SEARCH SPEC,LIST FILE?[# 0 0 &|D3" 1L!NOT A DISK FILEN !B 1L!E# 1 !BD0}ED:}:1BJ|DE 1DEBHI 1 h0ߢ 0.1}  0?詛 1 y0YЛ 1 ;#L" ;#L! BL1TYPE "Y" TO DELETE...DELETE FILE SPEC2}COPY--FROM, TO?OPTION NOT ALLOWED087 FREE SECTORS COPYING---D2:SPACE2.MACl# 0|D .L/%#3}##JB|DE 1BHID#E 1#0: B 1L!#͑### B 1#c$0SY4}S1}:## # # .#Ƚ# # 𩛙## 1,#PD#ELJ- <.BJD#E 5}1 1HH 0hh|DL%1}:̳# L% #D#EL% 1 0 . .0O% 1L!WILD CARDS NOT A6}LLOWED IN DESTINATION 0 <.|K}N 2 FORMAT. t* 5) 1L!`) 0NΞ 0 L1) 1 L!BAD LOAD FILELOAD FROM WHAT FILE?) 0 ?}0#B 1L!WHAT FILE TO LOCK?) 0 0$B 1L!WHAT FILE TO UNLOCK?DUP DISK-SOURCE,DEST DRIVES?TYPE "Y" IF OK TO US@}E PROGRAM AREACAUTION: A "Y" INVALIDATES MEM.SAV.FE! +L1   `*  70 2 2A} 0.* 1 y0 0)INSERT BOTH DISKS, TYPE RETURN^, 1 y038逍 N, 1L! ,B}C, t*  Lx+, 0 ^, 1 y0 , ,0,0 ,L+ ,I0 ,Vǭ0C}Ξ, 0 }, 1 y0C,ШC, 0K'!" H H 'h h Lx+!EF 5L1L!D,I,HhD}` NOT ENOUGH ROOMINSERT SOURCE DISK,TYPE RETURNINSERT DESTINATION DISK,TYPE RETURNE}`  `8 rL1`-* 1P* 1 y0Y`hhL!NAME OF FILE TO MOVE?- 0 0|DL% <.F},^ 1 70 0 .@L# .BJ 1  DEHIB V L1 ,} 1 70,L.  G}JB|,#P#DE 1 HI BDEHHII 1 B 1 ,^ 1 70,0La- B V,#PH},^ 1 70 0L#L!-* 1P* 1 y0Yj383}mm ݭI}}`8}``|* ? ɛ,`|:-)| / 1L!`DESTINATION CANT BE DOJ}S.SYS0 0H{ 24Δ 28/L!/) 2 Π 2 0 ξK}hAΞB,0 J 1 BDEHI,HÝDE 1HIHIDELSAVE-GIVE L}FILE,START,END(,INIT,RUN)O S0 1`BDEPHI V` S0H 1 L!M}0 0 1L~0`PLEASE TYPE 1 LETTER,0`hhL! 70 1L0L<1 ,;ɛ7,"ɛ:ݦ1ݥN}A"D|ݤD|ȩ:|ȩ|ɛ,,(/+.ީ1 1,ɛ`轤{NAMEO} TOO LONG B VL!` L1I H1EΝDL1|mDiE` V0`8d/8 i:222 1 LP}!ERROR- 165ɛ+,' 20*.. өr2 1``2TOO MANY DIGITSINVALID HEXAQ}DECIMAL PARAMETER800 0 8 00`,0'D800 H,ɛh`2L1NEED D1 THRU D8*uR} ECIMAL PARAMETER800 0 8 00`,0'D800 H,ɛh`2L1NEED D1 THRU D8*u00L 2Li0L0L0L0L1LP1L^1L1L1L1L1L1 3تʎL08L0إ M0ԆLa4L0 HȱHL0JH @3lhhh hhBhT}hDEhhHIhhJhhK VIi``hhh) BHI V0`L0hhhhh) BHIU}L0hh01hhh L 1`hhhhhhhL41`hhhHlhhhhhhhV} ``Ls1hhh`hhhhh`hhh𪈱`hhhȱhh`hhhW}) hhhh) 12 hh)`dbc@2L!2CL36Щ2ѭ@ҭ@LF2@ @2C2l  j2عk2lX}`'013W3h3{3333333334-4E4a44444455)5P5`5555556*696B6^6q6666666664dbc 1 run-time-error "Y}"Type a key to ret23urn to DOS.2 BȝD2E8HI Vl @3؅ԘLF2ЅȱЅ٥iА` @Z}3؅ȱ؅LF2 @3e؅ԥeمLF2 @3ԑLF2 @3ԑȥՑLF2 3ԑإ8ҥLF2҅ȱ҅` 3ԑȥՑL3ԅԄ[}LF2ԪȱԅՆLF2BL3 @334؅ԥمLF2 4ԑȥՑLF2iҥi `AL3Ա҅ԊȦձ҅ՊLF2 4 @3Р\}ȥёҥ؅ХمLF2҅ȱ҅ _2إ8؅ҥLF2б҅ЊȦѱ҅ъLF2 @3؅ХمLF2L4eЅАLF2 @3]}L4 @3e؅ҥeم45AL3LF2&LF2eԅȱeՅL38ԅȱՅL3ԍՍҍȱҍ 7^}ԭL3 p5ԭL3 p5ԭL3ҍȱҍDL3դL87ԅȱՅL3EԅȱEՅL3%ԅȱ%Յ_}L3҅ȱ҅FfL356ȱ҅L3҅ȱ҅&L3Ա҅L38ԅԩՅLF2EԅԩEՅLF2`}LF2LF28ԅȱՅ` M6ʆL3 M6ԅL3 M60 M60 M60åп M60a}ՐнԐՐЪԐПՐ67 ԐLg6Ր԰Lz6&&& L27 b}`ɀE ɀf8ਊ 7$ 8$P 8`E0 IIL7c}8L7Ff eeF77fff$ 8` 2`E0 IIL7X@@dbc @Ġ aA ܁ zA ܁,@+@ L@P A ܁ Z   Z'i@   q$|@ e} d%  l%@ A ҁ L A ܁    P ͚ ͚ &@ A ܁ Z f}@ "AA l$.A   A    ZA d$ZA   A    Ћ }Deep Blue C g} linker v1.2(C) 1982 John Howard PalevichLink program, Duplicate file or Quit'' is not a valid command.file name?LNKC h}CCҁт  ҁ L    @ (\ L $E $?B\Y i}  "#       ;$ ˉ     j}  ҂уt   pq r r    *Ws  "# &.Ё"ЁTs.D.D. k}D` Ё ЁTh.h| "Ё"ЁT.Ё     Ё T. l}Ё   ҃ф   Ё  T.f      ')Fy  m} ' ЁU   Ё TF.s.s@      '   A n}    i  ҄хy q   s $ f  # f  y    " o} (: ω TQ TlC  %l q ʁ        (  p}  %څ  #   ҅ц H ʁ    - ҁ ҁ΁"΁΁"΁ 4 q}     Ɓ $NЁȁȁ ȁ Ɓ   Ɓ#Ɓ" e  "# ÆpЁȁ Ɓ r}  Æ   Æ ́ =҆ч  "#  ц        e Ɓ s}Ё"ЁƁ"Ɓ )56   r   pno p p    *q t}  "# &q  q.Ӈ "#  ҇ш.ۇ        . u}I       Q.Qb j.jˈ      v} '&   y  '  .ӈ%҈щ       w} #" ( "#  .-eЁ     Ё 6r.r.r   x}  ͚  ? lj  %lj L oCCCToo҉Y many globalsbad byte code.bad CCC y} fileCCC file too largecan't read file.CCC fileerror [%s]%s:%dbad op codebad CCC codeZY z} & "t f   $ A     ) q i    q i     {}  ܁  &(  A        Zϋ&g   |}   f   $  "%      $never defined:Ћό }} ܁ e Z  r ʖ & 0      A (#     )d ; ܁  ~} % Q     H     \ ܁ e Z  w Ќύ }&     A       &@   H ܁ }   A (#     ) ܁  % Ǝ ю    H     }Ѝώ A      & ێ  Insert source disk & type RETURNCan't readFile too big, }use DOSread errorInsert destination disk & type RETURNCan't writewrite errorDuplicated successfullyFile too big. Sorry }Read errorЎ.OBJ fileWrite error.OBJ file ā΁   %    .%F } "      ē      Ё q   y   A (#  f   }i    r ʖ & ̓    w ʖ́ && ד  ́   qy y }΁ $   : r ʖʁ &v  ʁ : i   . ͚ & /   }  /    'ā"āy""y## ܐ y ā y##y""##  ā ##/ } ʁ 2 ΁Ú   y q   5  y   @   L    ^  }  p ܁Z΁ȑ́  } ܁  r ʖ &   ́  Ё  ȁ } āƁ  &Y  ́  Æ Æ ц      q i     }  qy y΁ $    r ʖʁ &  ʁ  i   . ͚ & }    ˔ Cʁ ́ L   Д 66ā"ā y ā y ā  Ք ʁ } ́ ΁ $ ܁.COM%s->%scan't findcan't write can't findunknown file type.OBJ.CC }Cunknown file typeStatistics:%dSymbols%dLabels%dGlobalsCode starts $%xStack starts $%xlinking. . .pass 2Ca }n't re-readmainNo main()dbccan't re-open fileunknown file type.OBJ.CCCunknown file typeno errors  } 9 $  $  $3 "69  +$  -$z -$m    " }  0)  9'•    0  "      $ } $  $ "ޕ – 0)  9'K  0 a)  f's  W } A)  F'  7–     "   & @  }   $ "ޖ $&     К  r$V  w$m  } a$              &   }     К            00 @ = }   x     &   H     Ę  К }       0    N  "#  7 # } &d  $  $   :%   :%   :%     }      . ͚ &3   .      a& % V } z( %`i  A& %  Z( %  00       }00 0u ͚000!0D:         }              К   }  % ͚ &  Ę (4             }    " #   -$|   0)  9'    0 }D        d$    s$    > c$B }    x$d   Þ  =   " #  }  ' &  "# -   E     (%  "#  0 }      $c  "# 0    (      Ę } &        )r      (a } '<  "#  0Y  "#  a     $  "# 0  }   (      Ę &    à (    }  = &=     К (o      Ę & }     #" (   = bhhhhhhhchehdfgfg`L$mc }ifgfd˭geé`00L 2Li0L0L0L0L1LP1L^1L1L1L1L1L1 3تʎL08L0إ M0ԆLa4 }L0 HȱHL0JH @3lhhh hhBhhDEhhHIhhJhhK VIi``hhh) B }HI V0`L0hhhhh) BHIL0hh01hhh L 1`hhhhhhh }L41`hhhHlhhhhhhh ``Ls1hhh`hhhhh`hhh }𪈱`hhhȱhh`hhh) hhhh) 12 hh)`dbc@2L!2CL36Щ2ѭ@ҭ@LF2 }@ @2C2l  j2عk2l`'013W3h3{3333333334-4E4a44444455)5P5`5555556*696B6^6q }6666666664dbc 1 run-time-error ""Type a key to ret23urn to DOS.2 BȝD2E8HI V }l @3؅ԘLF2ЅȱЅ٥iА` @3؅ȱ؅LF2 @3e؅ԥeمLF2 @3ԑLF2 @3ԑȥՑLF2 3ԑإ8ҥ }LF2҅ȱ҅` 3ԑȥՑL3ԅԄLF2ԪȱԅՆLF2BL3 @334؅ԥمLF2 4ԑȥՑLF2iҥi  }`AL3Ա҅ԊȦձ҅ՊLF2 4 @3Рȥёҥ؅ХمLF2҅ȱ҅ _2إ8؅ҥLF2б҅ЊȦѱ҅ъLF2 @3؅Х }مLF2L4eЅАLF2 @3L4 @3e؅ҥeم45AL3LF2&LF2eԅȱeՅL3 }8ԅȱՅL3ԍՍҍȱҍ 7ԭL3 p5ԭL3 p5ԭL3ҍȱҍDL3դL87ԅ }ȱՅL3EԅȱEՅL3%ԅȱ%ՅL3҅ȱ҅FfL356ȱ҅L3҅ȱ҅&L3 }Ա҅L38ԅԩՅLF2EԅԩEՅLF2LF2LF28ԅȱՅ` M6ʆL3 M6ԅL3 M60 }M60 M60åп M60ՐнԐՐЪԐПՐ67 ԐLg6Ր԰Lz6 }&&& L27 `ɀE ɀf8ਊ 7$ 8$P 8 }`E0 IIL78L7Ff eeF77fff$ 8` } 2`E0 IIL78L7Ff eeF77fff$ 8` @@dbcebef }  f T f T f Q f  ']e "# Ae  f Q }f T  ˱  $e g        >   . >}   g  T fg g T T  r ;d &Ef g Q T3e w ;d &of g Q} T3e,g   3edf dDeep Blue C Compiler version 1.1(C)1982 John Howard PalevichFi}le to compile (or RETURN to exit)g+gC.CCC->Couldn't open:Couldn't open:,g+h @S @ ,  S S[T d  } dddddd`7c d  " d d d d~dghhǭid $hk Zk  }h ak  g   z h fk     zr~h jk  4h   z,h+ir~h ok  Vh   }zr~h sk Uhhi~h |k Uzh5~hlg` $hd F` p  `&h ]T  "#}  h @dd S*id  % d  %~id 7 d   ,i+jd   }d  $ d  $ui    Īd dhdi k d $i k Q }di k  d k Ui j d Uj j k  9c d"d#,j+kj $}Hj k jj >$   "$  $vjjj d d"d# j d d  d k   k T} d T  d r ;d &j d k dkd  d  Sk  V ,kl} (Ik #" -k Y iexterncharintcharint#include#definemissing closing bracketNo errors.Can'}t nest include files<missing quote or <missing quote or >Hincluding Open failure on include filelm u U'l }  $Ml u     *}l u      +u |   } m~ $l -u   7|m  %l {m  $ m {m mn ?m}     |   7|     T Mu U $wm Ou  7 @ ,  S }d bu U $    `    ba >   `    >}   d   9c T   d& 9c   $    }"ֆ      T d"d#HP  'ba      }  %  "#i    &     %   $  } $ "#   <3    <M   9bac d  ^d } d   9c d   ܈d  d# <Ոˆ   3# $ ۀ}d # $Z0# $/Z0missing quotemissing apostropheline too longbsmacro table fu}llts ɉ ؠ ɉ ؠ d Uʼn ɉ‰ ؠ   f U }    i U    l U=    o U]    r U} } ɨ  ts  u U    y U    } U݊     } U    U ֨    Uw $?.|   Q ɉd } ؠ  ts   $.|   ؠ ҋ ؠ  } $  $       U $@  P ؠ } ~ ) ~1zts  F F   P 9c d ^ $}   ؠ ~ H U@  P) ؠ H F}    9c d ts ^ $   ؠ ~ H U} )  ؠ H F   # |% 9c d ^ 9c} d ^Y  i ؠ ݎ 9c tsd ^ $ 9c d ^ $ӎ UɎ }Ž ؠ֨Ў ڎ i  # ^% 9c d ^   0 ؠ } 9c d ^ $ Ux q ؠts  0  W# }&% 9c d ^Ϗ  ߏ ؠ S 9c d ^ $ 9c d ^ $I U? W}8 ؠF P ߏ   9c tsd ^ $ 9c d ^ $ }  ؠ  U  ؠ; U   ؠH }   9c d Ó ^ $ 9c d œ ^ $ 9c d Ǔ ^ts $ 9c d ʓ ^ $}  9c d ͓ ^ 9c d Г ^Α  ޑ ؠ ` ӓ U.  ؠ   } 'ޑb] ֓ Ux P ؠ    qޑ|ts] 9c d ٓ ^ 9c }d ۓ ^ $  ؠ    ޑU] 9c d ޓ ^ 9c d ^ }$V . ؠ    Oޑo] ޑ,+=-=*=/=%=t<<=>>=&=^=|=}=?||||&&&&|||=|||=|^=^=^&=&&&=&==!===!=<><=>=>><<<=>=<<<>>>  Д 9c }d e ^ $ 9c d h ^ $ 9c d k ^ 9c d o ^Z  j ؠ ̔ s U} Д ؠɔ v U” Д ؠ ɔ j  ^# +% #} -%  9c d y ^ 9c d | ^6  F ؠ Z  U ^n ؠ  }       W UP ^ԕ ؠ  ▕!}    $   $@     W F "} # *% # /% # %%  9c d ^ 9c d ^ 9c d ^ #}  ؠ } U! ^ ؠz UJ C ؠz Us $}l ؠɨz  U   $.|   ŗ ؠ) %} $)  a Uq   $(.|   : ؠ2  &}$^2  a U    ؠ a Uߘ   ј ؠ'}  a U&    ؠ ; a U   O (} ؠ   {        a U?   $)}                a*}   UӚ $o.|    ؠ)  $) 2  +} $ɚ2 a UY 㚸 $.|    ؠ2  $+2 ),}  $O) a >><<<<=>>=>><<+=-=+-*=/=%=*/%++---$-!*&illegal address-}++--     # [$ # ($L L  Uٜ $3 m{  | .}s  $Q ؠs  %s    + |  $  /}      I - UA $ z*  %! ؠ z*0} z   I  $`   $     1}   / U  ɉ 1 Uޝ  ɉ 3 |  m~  |  2}       $o       $   3}    7|`  %`       %*  $#4}                |   5}     ?П     5  m{   %6}         M           7}        $Ǡ  נ  =  %   $8}  {   a H | J | ) b   X 9}   ѣ          L U :} N U   ѡ#  $+ # 0$rZ # x$  X$j Zr;}  + #      0$ $! A)  F'ޢ  7  a<})  f'  W +    $+r &A       =} P U $}  Z '%  %     }     d U >}$   `# "%h# $h` )M R  d U $IZ $FI'  ]T `"`#?} Z Z ]T `"`#   \% # b$ ~ "$֤ "@} '$ ' f$ } n$  g$2  t$I  A}\$` \ 0)  7'  0Z  ' # 0&  7(h  B}   0Z "  #Z[can't subscript]can't subscript]((,)invalid expressiC}on()+-'string space exhaustedih    %   $      D}       d   %   $&  .    E} $T  \  b ih$x      n    F}   d  d      d  db         G}   .      dih %        b  H}b  b  b  b  b  b  b  b  b  ! I} "  #  $ b % b & b ' ihb ( b ) b * b + bJ} , b - b          N    K}     N F     ih       L}              N   M}    B "# )  @  'd iydd dzy  N} |{  V U ë  m~ $׫{  7|$  $  %O}  $ %${ X UZ l J Z       | |zy ZP} U $ í { \ Uͬ լ  m~ ${ | {Q} ^ UP l =  $:   M  z $  %r z R}za   d  } d   Vd ` U $ @dd S*Rd  $d S}  %  7d  $/ 7  d d dЭ*[,*[,baT}   $  $  $ "k  +$  -$ -$ޮ    U}"  0)  9'3    0  "      bV}a$  $  $ "O 3 0)  9'  0 a)  f'  W}W A)  F'   73     "   &X} @ ba  S $y "O $     A  r$ǰ  w$ްY}  a$         |    &S  Z}  ba   A   |      | 00  [}   x   | &   H Y    5  A\}q    ba |x 0      "#  ]} # &ղ  $  $   :%   :%   :%X _    ^}      ba  . > &   .      a& _}% dz z( %ѳڳ  A& %  Z( %   00     `} 00 0u >000!0D:00L 2Li0L0L0L0L1LP1L^1L1L1L1L1L1 3تʎL08L0إ M0a}La4L0 HȱHL0JH @3lhhh hhBhhDEhhHIhhJhhK VIi``hhh) b}BHI V0`L0hhhhh) BHIL0hh01hhh L 1`hhhhhhhc}L41`hhhHlhhhhhhh ``Ls1hhh`hhhhh`hd}hh𪈱`hhhȱhh`hhh) hhhh) 12 hh)`dbc@2L!2CL36Щ2ѭ@ҭ@e}LF2@ @2C2l  j2عk2l`'013W3h3{3333333334-4E4a44444455)5P5`5555556*696f}B6^6q6666666664dbc 1 run-time-error ""Type a key to ret23urn to DOS.2 BȝD2E8HI Vg}l @3؅ԘLF2ЅȱЅ٥iА` @3؅ȱ؅LF2 @3e؅ԥeمLF2 @3ԑLF2 @3ԑȥՑLF2 3ԑإ8q}B%DOS SYSB*)DUP SYSBSDBC OBJBWdCLINK COMBCC COMB{PMG C B PMG CCCBGRAPHICSC B GRAPHICSCCCB"AIO C BAIO CCCB X C B BOUNCE CCCB2BOUNCE COMB4MEDITC ECFB 5BOUNCE C BAX LNKB BX CCCB0KX COMB{PRINTF C BPRINTF CCCBBOUNCE LNKBDISKNAMEDATOMEDIT CKK C ACTION COM>~FORTH COMCPILOT COMҥLF2҅ȱ҅` 3ԑȥՑL3ԅԄLF2ԪȱԅՆLF2BL3 @334؅ԥمLF2 4ԑȥՑLF2iҥi r}`AL3Ա҅ԊȦձ҅ՊLF2 4 @3Рȥёҥ؅ХمLF2҅ȱ҅ _2إ8؅ҥLF2б҅ЊȦѱ҅ъLF2 @3s}؅ХمLF2L4eЅАLF2 @3L4 @3e؅ҥeم45AL3LF2&LF2eԅȱeՅLt}38ԅȱՅL3ԍՍҍȱҍ 7ԭL3 p5ԭL3 p5ԭL3ҍȱҍDL3դL87u}ԅȱՅL3EԅȱEՅL3%ԅȱ%ՅL3҅ȱ҅FfL356ȱ҅L3҅ȱ҅&v}L3Ա҅L38ԅԩՅLF2EԅԩEՅLF2LF2LF28ԅȱՅ` M6ʆL3 M6ԅL3 M6w}0 M60 M60åп M60ՐнԐՐЪԐПՐ67 ԐLg6Ր԰x}Lz6&&& L27 `ɀE ɀf8ਊ 7$ 8$y}P 8`E0 IIL78L7Ff eeF77fff$ 8z}` 2`E0 IIL78L7Ff eeF77fff$ 8 #define RAMTOP 0x6a#define PCOLR0 0x2c0#define SDMCTL 0x22f#define GRACTL 0xd01d#define CHBAS 0x2f4#define PMBASE 0xd407|}#define SIZEP0 0xd008#define HPOSP0 0xd000#define P0PF 0xd004#define P0PL 0xd00c#define HITCLR 0xd01e#define OCSET 0xe0}}00#define GRAFP0 0xd00d#define RANDOM 0xd20achar *playbase,*charbase,playsize;/* initialize players */pmcinit()$(~}int i;charbase=(peek(RAMTOP)-12)<<8;playbase=(peek(RAMTOP)-4)<<8;poke(RAMTOP,peek(RAMTOP)-16);graphics(0);pmgraph}ics(0);move(OCSET,charbase,0x400);poke(CHBAS,charbase>>8);$)/* flush players */pmcflush()$(pmgraphics(0);poke(}CHBAS,OCSET>>8);poke(RAMTOP,peek(RAMTOP)+16);graphics(0);$)/* set up one or two line resolution * players */pmgraph}ics(i)int i;$(int j;if(i)$(poke(SDMCTL,i==1 ? 0x3a : 0x2a);poke(GRACTL,2);playsize=(i==1 ? 8 : 7);poke(PMBA}SE,(playbase>>8)-(i==1 ? 4 : 2));for(j=0;j<4;++j)$(poke(HPOSP0+j,0);pmclear(j);$)$)else$(poke(SDMCTL},0x22);poke(GRACTL,0);for(j=0;j<4;++j)$(poke(HPOSP0+j,0);poke(GRAFP0+j,0);$)$)$)hitclear()$(poke(HIT}CLR,0);$)pmcolor(n,c,i)char n,c,i;$(poke(PCOLR0+n,(c<<4)+i);$)pmwidth(n,w)char n,w;$(poke(SIZEP0+n,w);$)hitp}2pf(f,t)char f,t;$(return (1<=16384)mask= -1; /* $FFFF */else$(mask=2;while(n>=mask)mask=mask<}<1;--mask; /* to 0..01..1 */$)while(n<(temp=(peek(RANDOM)+(peek(RANDOM)<<8))& mask)); /* average 2 times */ret}urn temp;$)/* * end of graphics library */p=(peek(RANDOM)+(peek(RANDOM)<<8))& mask)); /* average 2 times */ret1'  '    0   ' '''  ' ' U  ' T !} '       ''  '  '' T  ' U  '' !} '' U  ' T  ''        ''  ' '  !} ' U  ' T  '       ' ' p   !'"' |  !} !'#' x   !'$'    !'%' #' . .!}     &' #' .   .    !}  ''$0(' &  # @)   !}  )   #  !' !'   & !}S:''gr9color'graphics'close'open'color'drawto'poke'dpoke'ciov'locate'position!}'cgetc'plot'cputc'setcolor'fill 'paddle!'peek"'ptrig#'stick$'strig%'vstick&'hstick''sound('rnd }/* * Deep Blue C Compiler * Atari I/O routines * and library fuctions * (c) 1982 John Howard Palevich */#define EOL 15%}5#define TAB 127#define SPACE 32/* * val(s) returns numeric value of * string in s */val(s)char *s;$(char c;%}int v,sign;while(c= *s)$(if(c==SPACE | c==EOL | c==TAB)++s;else break;$)sign=1;if(c=='+' | c=='-')$(if(c=='-%}')sign= -1;c= *++s;$)v=0;while(c>='0' & c<='9')$(v=v*10+c-'0';c=*++s;$)return v*sign;$)/* * hval(s) --%} hex string to integer */hval(s)char *s;$(int v;char c;v=0;while(c= *s)$(if(c==TAB | c==SPACE | c==EOL)++s;%}else break;$)while(1)$(if(c>='0' & c<='9')c=c-'0';else if(c>='a' & c<='f')c=c-87;else if(c>='A' & c<='F')c=c-%}55;else break;v=(v<<4)+c;c=*++s;$)return v;$)copen(fn,mode)char *fn,mode;$(int k,io,r,dir;io=0;whil%}e(io<8)$(if(peek(832+(io<<4))==255)break;++io;$)if(io==8)return -1; /* no iocb */fn[k=strlen(fn)]=EOL;if(mode==%}'r')dir=4;else if(mode=='w')dir=8;else if(mode=='a')dir=9;else return -132;r=ciov(io,3,fn,k+1,dir,0);fn[k]=0;if(r%}<0)$(cclose(io);return r;$)return io;$)/* * open an iocb the 'normal' way * -- open(iocb,fname,ax1,ax2); */%}open(iocb,ax1,ax2,fname)char iocb,ax1,ax2,*fname;$(return ciov(iocb,3,fname,strlen(fname),ax1,ax2);$)/* * close a%}n iocb the 'normal' way */close(i)char i;$(return cclose(i);$)cclose(i)int i;$(return ciov(i,12,-1,-1,-1,-1);%}$)cputc(c,unit)char c;int unit;asm 12297;cgetc(unit)int unit;asm 12294;getchar()$(return cgetc(0);$)putc%}har(c)char c;$(return cputc(c,0);$)gets(str)char *str;$(int r;if((r=ciov(0,5,str,120,-1,-1))<0)return r;s%}tr[r=dpeek(840)-1]=0;return r;$)cprints(str)char *str;$(return cputs(str,0);$)cputs(str,i)char *str;int i;$%}(int k;if(k=strlen(str))return ciov(i,11,str,k,-1,-1);else return 1;$)/* ciov(iocb,com,bad,blen,ax1,ax2) * -1 fo%}r bad,blen,ax1, or ax2 will * leave that parameter unchanged */ciov(iocb,com,bad,blen,ax1,ax2)int iocb,com,blen,ax1,ax2%};char *bad;asm 12291; /* $3003 *//* normalize(fname,fext) * converts file to upper case, * adds D: if no prefix, * a%}dds .fext if no extension */normalize(fname,fext)char *fname,*fext;$(int i;char c,temp[20];/* to upper case */i%}=0;while(c=fname[i])fname[i++]=toupper(c);if(--i < 0)return 0; /* null fname *//* fname[i] is last char of name */%}/* pre-fix D: */if(i==0 | (i==1 & fname[1]!=':')|(fname[1]!=':'&fname[2]!=':'))$(strcpy(temp,"D:");strcpy(temp+2,%}fname);strcpy(fname,temp);i=i+2;$)/* if no '.', add '.'fext */if(find(fname,i+1,'.')<0)$(fname[i+1]='.';str%}cpy(fname+i+2,fext);$)$)/* * toupper(c) -- if c lower case, * return upper case, else return c. */toupper(c)char %}c;$(return (c < 'a') || (c > 'z')? c : c-32;$) /* * tolower(c) -- if c upper case, * return lower case, else retur%}n c. */tolower(c)char c;$(return (c < 'A') || (c > 'Z')? c : c+32;$)/* strcpy(a,b) -- copy b into a * returns %}size of b (not counting 0) */strcpy(a,b)char *a,*b;asm 12300;/* move(a,b,len) -- move len chars from * a to b, inc-i%}ng addresses */move(a,b,len)char *a,*b;int len;asm 12303;/* clear(a,len) -- clear a to a+len-1 */clear(a,len)c%}har *a;int len;$(*a=0;move(a,a+1,len-1);$)/* usr(addr,.....) -- call usr(x) subr * at address addr */usr(addr)%}char *addr;asm 12306;/* find(addr,len,ch) -- find first * occurence of ch in addr to * addr+len-1, return 0--len or -1 %}if * not found */find(addr,len,ch)char *addr,ch;int len;asm 12309;/* * return length of string * not including z%}ero */strlen(str)char *str;$(return find(str,30000,0);$)/* * peek(i) -- return byte in i */peek(i)char *i;a%}sm 12312;/* * poke(i,d) -- return OLD value of d */poke(i,d)char *i,d;asm 12315;/* * dpeek(i) -- return word in [%}i,i+1] */dpeek(i)char *i;asm 12318;/* * dpoke(i,w) -- return old value of w */dpoke(i,w)char *i;int w;asm 12%}321;/* end of Atari library */m 12318;/* * dpoke(i,w) -- return old value of w */dpoke(i,w)char *i;int w;asm 12$!'   $  $  $ "  +$)}  -$ -$    "  0)  9'    )} 0  "   '      $  $  $)}  "     0)  9'  0 a)  f')}  W A)  F'  7     ")} '  & @   ' $ ")} $     '  r$  w$ )} a$         '    )}&  '   '    '   '' '' )}    '' 0'0' '' ''   x   )}' &! !  H '   '  ' '  '")}     '#" #'0!' $   )}%  "#  "'$% # && & $  $   :%  )} :%   :%' #'   #'  #'  '  )} . $' &(   .     #'("' a& % ) z( )}%)*+* +%' A& % , Z( %,-.- .#' 0&')}0''      &'('0$'0' 0u $''0)'0'0*'!0)}D:'val'hval'copen'peek'strlen'ciov'cclose'open'close'cputc'cgetc'getchar'putchar'g)}ets'dpeek'cprints 'cputs!'normaliz"'toupper#'strcpy$'find%'tolower&'move''clear('usr)'poke*'dpoke)}ts'dpeek'cprints 'cputs!'normaliz"'toupper#'strcpy$'find%'tolower&'move''clear('usr)'poke*'dpoke(/* Test the I/O */main()$(char c;printf("File reader/writer\n");printf("Command: r,w,q\n");for(;;)$(printf("\n-}-> ");c=tolower(getchar());while(getchar()!='\n');switch(c)$(case 'r':rfile();break;case 'w':-}wfile();break;case 'q':return;default:printf("'%c' is not a command.\n",c);printf("Try R(ead), W(-}rite), or Q(uit).\n");break;$)$)$)rfile()$(char fname[20];int i;char c;for(i=0;!i;)$(printf("File to-} read? ");gets(fname);normalize(fname,"C");if((i=copen(fname,'r'))<0)$(printf("I/O error %3d on %s\n",-i,fna-}me);i=0;$)else break;$)/* now print file on consol */while((c=cgetc(i))>=0)putchar(c);cclose(i);printf("\-}n--EOF--");$)wfile()$(char fname[20],line[120];int i;char c;for(i=0;!i;)$(printf("File to write? ");gets(fn-}ame);normalize(fname,"C");if((i=copen(fname,'w'))<0)$(printf("I/O error %3d on %s\n",-i,fname);i=0;$)-}else break;$)/* now read file from consol */while((c=getchar())>=0)cputc(c,i);cclose(i);$)i,fname);i=0;$),d' r '''  '  '  '  ' 8 '  ' ' 1}' O ' O '  ' ' O ' ' O ' 1} & "    ' ' I'''' '1}'     d '      1}  ' !'  "' % ' #'.- .      .=. 1} ..+   ..*  .q.Q 1} $'  $'        1}   %'   %' '  &    2 1} $'  $'   d&     d $' 1}   $' ! $'  $' ![K:}Bouncin1}g Ball DemoPress arrow keys to move ball,Use 'q' to quit. '''key'ballshap'main'cop2}en'pmcinit'graphics'pmgraphi'cprints'color'plot'drawto'pmcolor'pmwidth'ballhack'pmcflush'2}cclose 'hitclear!'plmove"'peek#'cgetc$'sound%'hitp2pf'drawto'pmcolor'pmwidth'ballhack'pmcflush'0B@@dbc @O jC r ECzL  I  *M mC G C G C G  I XJ I O XJ 6} O I  I XJ O I XJ O I  &@@ "@    QN 6} pN@ AACCALC F     dDNWAQA   6}   C DO  I %YBC G.-A.AA  YBA.=A.AA YBA.A.+AA  YB6}A.A.*AB BBYBB.qB.QBCB K  K FBVB  ;CFB  6}     N   N;CDNB  &B B   2 K B 6} K $C  d&CCC  C    d K 8C  K cC K  6 } K TAK:}Bouncing Ball DemoPress arrow keys to move ball,Use 'q' to quit. CD 6 } D $  $  $ D " DDC  +$  -$QD -$DD    "6 }  0)  9'D    0  "YD     D DE$6 }  $  $D "DDD E 0)  9'"E  0uE a)  f'JE  W6 }uE A)  F'rE  7uEE     "D   &E @ 6}EF  I $EE "E $E     I  r$-F cF w$DF 6}cF a$[F cF        G    &F  6}   FG I   G F     G 00 G  G 6}  x   G &_G   H I    G  IG 6}    GGHG 0    H  "#  IG # &26}H  $  $   :%   :%   :%H I kI   kI  kI6}     . HII &I   .     kI a& % $I z( 6} %.I7I  A& % WI Z( %aIjI  00      nI06}0 0u I000!0D:IJ  F    0   vL F yL  yL I U  I T6}  I       G  J  G T  I U  IyL   G U  I T 6} I        I JK yL I   I U  I T  I       6} G p   I |   I x   I    I :K .xKK K.KK 6} KK KK :K .KK K.KKxLK  KK KK$0 &K  # 6}@)L  @L   )9L  L #  I I   &nL@L S:zLyM6} j I  O j I  O j j I  I I *M O  nI  O  I *M6}   I j j I  I I M /  $JM :MM * I   I $pM sM O6}  zMyNO   $M M  I  &MM "M   I NM@N / " I 6} I  &@NN "N   I   IN  I      6 }I   zNyO I     IN N     IN N O  O  6!}O qI  O   nI     nI   O  nI  O  O 6"}   nI  zOO IO  O00L 2Li0L0L0L0L1LP1L^1L1L1L1L1L1 3تʎL08L0إ6#} M0ԆLa4L0 HȱHL0JH @3lhhh hhBhhDEhhHIhhJhhK VIi``hhh)6$} BHI V0``hhhhh) BHIL0hh01hhh L 1`hhhhhhh6%}L41`hhhHlhhhhhhh ``Ls1hhh`hhhh6&}h`hhh𪈱`hhhȱhh`hhh) hhhh) 12 hh)`dbc@2L!2CL36Щ2ѭ6'}@ҭ@LF2@ @2C2l  j2عk2l`'013W3h3{3333333334-4E4a44444455)5P5`555556(}56*696B6^6q6666666664dbc 1 run-time-error ""Type a key to ret23urn to DOS.2 BȝD2E8HI V6)}l @3؅ԘLF2ЅȱЅ٥iА` @3؅ȱ؅LF2 @3e؅ԥeمLF2 @3ԑLF2 @3ԑȥՑLF2 36*}ԑإ8ҥLF2҅ȱ҅` 3ԑȥՑL3ԅԄLF2ԪȱԅՆLF2BL3 @334؅ԥمLF2 4ԑȥՑLF2iҥi6+} `AL3Ա҅ԊȦձ҅ՊLF2 4 @3Рȥёҥ؅ХمLF2҅ȱ҅ _2إ8؅ҥLF2б҅ЊȦѱ҅ъ6,}LF2 @3؅ХمLF2L4eЅАLF2 @3L4 @3e؅ҥeم45AL3LF2&LF2eԅ6-}eՅL38ԅȱՅL3ԍՍҍȱҍ 7ԭL3 p5ԭL3 p5ԭL3ҍȱҍDL36.}L87ԅȱՅL3EԅȱEՅL3%ԅȱ%ՅL3҅ȱ҅FfL356ȱ҅L3҅ȱ҅6/}&L3Ա҅L38ԅԩՅLF2EԅԩEՅLF2LF2LF28ԅȱՅ` M6ʆL3 M6ԅ60}L3 M60 M60 M60åп M60ՐнԐՐЪԐПՐ67 ԐLg6Ր61}԰Lz6&&& L27 `ɀE ɀf8ਊ 7$ 862}$P 8`E0 IIL78L7Ff eeF77fff$ 863}` 2`E0 IIL78L7Ff eeF77fff$ 84r( L78L7Ff eeF77fff$ 88*/* * Demo the player graphics * (C) 1982 John H Palevich */charkey;char *ballshape;main()$(char i;key=copen("K:>6}",'r');pmcinit();graphics(7);pmgraphics(1);cprints("\fBouncing Ball Demo\n");cprints("Press arrow keys to move ball>7},\n");cprints("Use 'q' to quit.");color(1);plot(0,0);drawto(159,0);plot(0,79);drawto(159,79);color(2);plot(0,0);drawt>8}o(0,79);plot(159,0);drawto(159,79);for(i=0;i<4;++i)$(pmcolor(i,4*i,6);pmwidth(i,0);$)ballshape="\20\0\0\0\0\0\6>9}\11\11\11\11\6\0\0\0\0\0";ballhack();pmcflush();cclose(key);$)ballhack()$(char xbounce,ybounce,i,px,py,dx,dy;i=>:}dx=dy=0;px=py=100;hitclear();for(;;)$(i=(i+1)&3;plmove(i,px,py,ballshape);if(peek(764)!=255)$(switch(cgetc>;}(key))$(case '-':case '':dy=-1;break;case '=':case '':dy=1;break;case '':><}case '+':dx=-1;break;case '':case '*':dx=1;break;case 'q':case 'Q':so>=}und(0,0,0,0);sound(1,0,0,0);return;default:dx=dy=0;$)$)px+=dx;py+=dy;if((xbounce=hitp2>>}pf(i,1)) |(ybounce=hitp2pf(i,0)))$(hitclear();if(xbounce)$(/* hit side */dx=(px<128 ? 1 : -1);soun>?}d(0,50,10,10);$)else sound(0,0,0,0);if(ybounce)$(/* hit top/bot */dy=(py<100 ? 1 : -1);sound(1,100>@},10,10);$)else sound(1,0,0,0);$)else$(sound(0,0,0,0);sound(1,0,0,0);$)$)$): -1);sound(1,100<gXAIOPRINTFDBC.OBJe sound(1,0,0,0);$)else$(sound(0,0,0,0);sound(1,0,0,0);$)$)$): -1);sound(1,100@' '  ' $ ' ' '' %.r  'FC} .w  ' .q   )  ' A 'FD}'  $ b ' ' q '  r FE}' & s   '   ' ) ' FF}' ''x  $ 's 's 'FG} q w ' &  o '  ' )   'FH}  'qFile reader/writerCommand: r,w,q-> '%c' is not a command.Try R(ead), W(rite), or Q(uit)FI}.File to read? CI/O error %3d on %s--EOF--File to write? CI/O error %3d on %s'main'printf'tolower'getcFJ}har'rfile'wfile'gets'normaliz'copen'cgetc'putchar'cclose'cputc'main'printf'tolower'getcDZ@@dbc @N B H B H"@@ )B H F 6HF %G@8@.rS@]@@@e@.we@o@XA@w@.qw@~@JL}@@ .B  H FB H@@@@  $!A@@ gB H &F vB F  r DJM} &A xAAB   H A!A@   F )CA F!A E B Hx JN} $A~AlA B Hs &Fs B F q w D &A B  o H AA{A F )AJO}   FA EBBqFile reader/writerCommand: r,w,q-> '%c' is not a command.Try R(ead), W(rite), or Q(uitJP}).File to read? CI/O error %3d on %s--EOF--File to write? CI/O error %3d on %sBC  C $JQ}  $  $B "CCB  +$  -$FC -$9C    "  0) JR} 9'C    0  "NC     C CD$  $  JS}$C "CCC D 0)  9'D  0jD a)  f'?D  WjD A)  JT}F'gD  7jDD     "C   &D @ DE  HJU} $DD "D $D     H  r$"E XE w$9E XE a$PEJV} XE        F    &E E   EFJW}   H   F E     F 00  F  F   JX}x   F &]F   H H    F  HF   JY} FG FF 0    G  "#  HF # &0G JZ} $  $   :%   :%   :%G H iH   iH  iH  J[}   GH  . H &G   .     iH a& % "H z( %,HJ\}5H  A& % UH Z( %_HhH  00      lH00 0uJ]} H000!0D:HI H     H H PI H  J^}   H H   H PI   H H ]K   % HJ_} &I  F IJ(J     F        J`} J " #   -$HJ  ~J 0)  9'{J    0~JJJ   Ja}    H d$J  JK  aKLK s$J    NLK c$K   Jb}MLK x$0K   LLK   F   " #}I   'Jc} &K  "# -   L  KL   (K  "#  0    Jd}  K $/L  "# 0    (]L    nN  F &L Je}   nN    )LM>M      (-M 'M  Jf} "#  0%M  "#  a    L $\M  "# 0    Jg}(M    nN  F &M    nNMN (M   nN   FJh} & N   nN  H (;N    nN  F &jN    nJi}N #" (N   FnN 00L 2Li0L0L0L0L1LP1L^1L1L1L1L1L1 3تʎL08L0إ M0ԆLa4LJj}0 HȱHL0JH @3lhhh hhBhhDEhhHIhhJhhK VIi``hhh) BHJk}I V0`L0hhhhh) BHIL0hh01hhh L 1`hhhhhhhJl}L41`hhhHlhhhhhhh ``Ls1hhh`hhhhh`hhhJm}𪈱`hhhȱhh`hhh) hhhh) 12 hh)`dbc@2L!2CL36Щ2ѭ@ҭ@LF2@ Jn}@2C2l  j2عk2l`'013W3h3{3333333334-4E4a44444455)5P5`5555556*696B6^6q66Jo}66666664dbc 1 run-time-error ""Type a key to ret23urn to DOS.2 BȝD2E8HI Vl Jp} @3؅ԘLF2ЅȱЅ٥iА` @3؅ȱ؅LF2 @3e؅ԥeمLF2 @3ԑLF2 @3ԑȥՑLF2 3ԑإ8ҥJq}LF2҅ȱ҅` 3ԑȥՑL3ԅԄLF2ԪȱԅՆLF2BL3 @334؅ԥمLF2 4ԑȥՑLF2iҥi Jr}`AL3Ա҅ԊȦձ҅ՊLF2 4 @3Рȥёҥ؅ХمLF2҅ȱ҅ _2إ8؅ҥLF2б҅ЊȦѱ҅ъLF2 @3؅ХمJs}LF2L4eЅАLF2 @3L4 @3e؅ҥeم45AL3LF2&LF2eԅȱeՅL38Jt}ȱՅL3ԍՍҍȱҍ 7ԭL3 p5ԭL3 p5ԭL3ҍȱҍDL3դL87ԅȱJu}ՅL3EԅȱEՅL3%ԅȱ%ՅL3҅ȱ҅FfL356ȱ҅L3҅ȱ҅&L3Jv}҅L38ԅԩՅLF2EԅԩEՅLF2LF2LF28ԅȱՅ` M6ʆL3 M6ԅL3 M60 M6Jw}0 M60åп M60ՐнԐՐЪԐПՐ67 ԐLg6Ր԰Lz6Jx}&&& L27 `ɀE ɀf8ਊ 7$ 8$P 8Jy}`E0 IIL78L7Ff eeF77fff$ 8`Jz} 2`E0 IIL78L7Ff eeF77fff$ 8`H/* * Deep Blue C formatted output * (C) 1982 John Howard Palevich * -- printf() and fprintf() * -- for version 1.0 of dbcN|}.obj only! */printf()$(int sp;sp=dpeek(210); /* run-time stack */sp=sp-(6+peek(dpeek(sp-8)));return fprint(sp,0);N}}$)fprintf()$(int sp;sp=dpeek(210);sp=sp-(6+peek(dpeek(sp-8)));return fprint(sp+2,dpeek(sp));$)fprint(s,io)chN~}ar *s;int io;$(char *fstring,*arg,c;int cleft,i,size,sign;cleft=strlen(fstring=dpeek(s));while(cleft)$(if((i=fiN}nd(fstring,cleft,'%'))<0)$(cputs(fstring,io);return; /* no more formatting */$)if(i>0)$(/* chars before % */N}ciov(io,11,fstring,i,-1,-1);fstring=fstring+i;cleft=cleft-i;$)/* get numeric arguement */size=0;sign=1;N}while(cleft)$(++fstring;--cleft;c= *fstring;if(c=='-')sign= -sign;else if(c>='0' & c<='9')size=siN}ze*10+(c-'0');else break;$)size=size*sign;arg=dpeek(s=s+2);/* check format character */if(c=='d')fprintd(N}arg,size,io);else if(c=='s')fprints(arg,size,io);else if(c=='c')fprintc(arg,size,io);else if(c=='x')fpriN}ntx(arg,size,io);else $( /* %%, etc. */cputc(c,io);s=s-2; /* not really an arg */$)++fstring;--cleft;$N})$)/* * print decimal # */fprintd(arg,size,io)int arg,size,io;$(/* buffer string */char buf[7],flag,c;int i,kN};i=flag=0;k=10000;if(arg<0)$(buf[i++]='-';arg= -arg;$)while(k)$(if(flag | (c=arg/k)>0)$(buf[i++]=c+'0'N};flag=1;$)arg=arg%k;k=k/10;$)if(flag==0)/* zero */buf[i++]='0';buf[i]=0;if(size > 0)fprintws(io,sN}ize-i);cputs(buf,io);if(size < 0)fprintws(io,(-size)-i);$)/* * print hex # */fprintx(arg,size,io)int arg,size,N}io;$(/* buffer string */char buf[7],flag,c;int i,field;i=flag=0;field=12;while(field>=0)$(if(flag|(c=(argN} >> field)&15)>0)$(if(c<=9)buf[i++]=c+'0';else buf[i++]=c+'a'-10;flag=1;$)field=field-4;$)if(flag==0)/N}* zero */buf[i++]='0';buf[i]=0;if(size>0)fprintws(io,size-i);cputs(buf,io);if(size<0)fprintws(io,(-size)-i);$)/N}* * print character */fprintc(arg,size,io)char arg;int size,io;$(if(size>0)fprintws(io,size-1);cputc(arg,io);ifN}(size<0)fprintws(io,(-size)-1);$)/* * print string */fprints(arg,size,io)char *arg;int size,io;$(int i;i=strleN}n(arg);if(size>0)fprintws(io,size-i);cputs(arg,io);if(size<0)fprintws(io,(-size)-i);$)/* * print n characters of whN}ite space */fprintws(io,n)int io,n;$(while(n-- > 0)cputc(' ',io);$)o,(-size)-i);$)/* * print n characters of whLM' '     ' ' '' '  R}    ' '   ' ''   ' R}'    % ' &  ' (   R}  '          " #   -$R}    0)  9'     0     R}    ' d$    '  s$   ' R} c$   ' x$   '  '  R}  " #'   ' &  "# -R}        (  "#  0     R}  $  "# 0    (    '  R} ' &    ''    )R}      ( '  "#  0  "#  a R}    $   "# 0     (!  R}  '!  ' &"    '"' (#   '#R}  ' &$   '$'  ' (%    'R}%  ' &&    '&'' #" ((  ''('prR}intf'dpeek'peek'fprint'fprintf'strlen'find'cputs'ciov'fprintd'fprints'fprintc'fprintx'R}cputc'fprintws ek'fprint'fprintf'strlen'find'cputs'ciov'fprintd'fprints'fprintc'fprintx'Pbounceaiographicspmgdbc.obj'fprintf'strlen'find'cputs'ciov'fprintd'fprints'fprintc'fprintx'T APX-20166DEEP BLUE "C"JOHN H. PALEVICH11/18/820'find'cputs'ciov'fprintd'fprints'fprintc'fprintx'X4&0LL:Dr@( d@ ` @}>*p+9*i+-6-<5KA9~,88I9E:K:P:FILENAME IS ^}ˠҠ//6K Q*CL+CRf*CU+CD<,CBBT,CEBc,CBFn,CEF,CBL,CEL,CC.-DLd-DB-DAj.DR_.DF.BC/^}BDc0BM1BP1BW2BRU2MSU3MC2PL}2WL3IH6IT3OC16SB66SF;6SRB@6SRFE6SRVBJ6SRVFO6RL}6LMĞ6RM4EXITq4ABORT^}7REOPEN 7CTS6KMIKE LORENZEN'SMEMORY FULCURSOR AT ENLINE TOO LONINPUT EOUSING DEFAULTILLEGAL DEV:FILE.EXNEW FILNUMB^}ER TOO BIDELIMITER ERROUNRECOGNIZED COMMANNOT COMPLETFILE LOCKEEDITOR IS CONFUSEBREAK KEY ABORSEARCH FAILECANNOT - PR^}EVIOUS I/O ERROCANNOT FIND MARKED BLOCCANNOT FIND FILVERIFY (REPLACE,SKIP,QUIT)MARGIN VALUE ERROI/O ERROR ^}"-?N[v'''''''''((((((((((((}WARNING - LIMITED FREE SPACESOURCE FILE SIZE FREE SPACE TO AB^}ORT, TO IGNORE}EDITOR CANNOT RUN - NO FREE IOCB'S TO RETURN TO DOS} PROGRAM-TEXT EDITOR ^} Version 1.0 For Dos 2.0 Copyright 1981, ATARIL* *LL* *Ƣ` *L\* *$^} =` , *Lt* * =`ŏ *L* *`$0B *;$0;ɛ$ ƒ h8埆 ++Wƒ ++N^}論L< 9ɛ,O0.* *;L* *;ōL+埆eL'+ƒ ++`Ə`Ɛ` ` ;8塅^} 2;Le+ Q;`L+ +Ƣ` +$ =` , q+ =`L<ɛ ,O0M#Gš 8卅񄒩^}.撄+ 2: ,e = 9L , 2: ,`ō%e ; 2;Ɛ` : :LO,^}` : :`,OL<,L7 T,$0 3 3Ln,`6ɛ 9ō卦Ɛ𥩅Ȅ`$0  :*L,^}ɛ j+L,` ƵOL<ɛ$0 ,ŵ+ɛ 5L, +L, *ŵ *L!-` 7- =` ,!ȱ9Mɛ^}ɛ :LL-L:L< q-$ =` $L<$0L- :*$@ '.; j+LCIɛ,O0  :*L:ƒ ++L: :* , '.^} , q+LCI` - $ =`LCIe$0(ɛ :*L:š印 j+= L.L:*Lj+3ɛ% *; : :LT. ;O` ^}:LX. :` :* <8` q-L_.`ɛ$0L,ɛ -L}.` : =4` f>ii8¥ >^}…Å |=LGL0…Å |=8ą^}8ąŅ :LU0eąeŅ |=eąeŅ f:LU0 :^}…Å…Å f:`L< : = f> >…Å |=(x…Å |=^}eąeŅƜƛ8ąŅꥩ |=`ƃƂeąeŅ^}eąeŅ |=eąeŅeąeŅ f:` C3 1L2 1 1L2 =8^}ii `hh` BCLOL< N2LNO7/ 2CPDNE` , 1 ;PBJ oB ^}L< B9P ; P0 P 3L72 J-L6B&HvH ,Ȅ B9hhO 6L+ 1L2 C3 ,L3PBJN^}K V0MDNE B =GņŇ> A @Nv&ۮPȝHI VĄ 6B L ? , J-Lp3L<,,OPL<$L< T, ;P ;O^} P  @O0 Pۥ f*`,OL< ,Lp4OPPХѱɛ PPłŃ L3 <,P^}v&)DEȝHI B oB O OL< J-PPPP PЪ` 2=OP 9B < x5L5 2=,OL3H^}H n, 3hhO! m5OO,$ 2CP! &B VBO,$ 2C!$ 2CP &B VBO$ 2C,$ 2CP &B <P 9B,P^}LFD 1A \ 9B`D&E JB V M=ǩD fBl PP 9B <P 9B <$ 2C!P &BLVB^} H B9hɛb$0>HɛOBHH膵 ,hhhL5H :* 5hHŒhhL5 :ɛ ;O :L< j+$` B9CL^}HO 5hih =`L@L@L@L@@L@AL@ B99MO𵅛 eͻL ,6M06M`LPȄ , B9 g< i =`P^} q-L|9L